stazsoftware.com

home *** CD-ROM | disk | FTP | other *** search

/ stazsoftware.com / www.stazsoftware.com.tar / www.stazsoftware.com / futurebasic / sample-code / Add30Days.sit / Add 30 Days

MacBinary | 2003-09-05 | 1.1 KB | [TEXT/FB^e]

open in:

MacOS 8.1 extracted |

Win98 extracted |

DOS extracted

browse contents |

view JSON data |

view as text

This file was processed as: MacBinary (archive/macBinary).

Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Fri Sep 5 12:33:46 2003, modified Fri Sep 5 12:33:46 2003, creator 'FB^e', type ASCII, 591 bytes "Add 30 Days" , at 0x2cf 371 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default

id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[FB^e]`

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 41 64 64 20 33 30 | 20 44 61 79 73 00 00 00 |..Add 30| Days...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 46 42 5e | 65 00 00 00 00 00 00 00 |.TEXTFB^|e.......|
|00000050| 00 00 00 00 00 02 4f 00 | 00 01 73 bb 7e 6b 6a bb |......O.|..s.~kj.|
|00000060| 7e 6b 6a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |~kj.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 57 83 00 00 |........|....W...|
|00000080| 0d 27 7e 27 41 0d 27 20 | 20 20 20 20 20 20 20 20 |.'~'A.' |        |
|00000090| 20 20 20 20 20 20 20 20 | 20 20 20 43 41 4c 4c 20 |        |   CALL |
|000000a0| 52 65 71 27 64 20 3a 20 | 4f 66 66 0d 27 7e 27 42 |Req'd : |Off.'~'B|
|000000b0| 0d 0d 2f 2a 0d 20 20 20 | 20 20 69 74 27 73 20 61 |../*.   |  it's a|
|000000c0| 20 73 69 6d 70 6c 65 20 | 71 75 65 73 74 69 6f 6e | simple |question|
|000000d0| 3a 20 68 6f 77 20 64 6f | 20 69 20 61 64 64 20 33 |: how do| i add 3|
|000000e0| 30 20 64 61 79 73 20 74 | 6f 20 61 20 64 61 74 65 |0 days t|o a date|
|000000f0| 3f 0d 0d 20 20 20 20 20 | 74 68 69 73 20 65 78 61 |?..     |this exa|
|00000100| 6d 70 6c 65 20 61 64 64 | 73 20 33 30 20 64 61 79 |mple add|s 30 day|
|00000110| 73 20 74 6f 20 74 6f 64 | 61 79 27 73 20 64 61 74 |s to tod|ay's dat|
|00000120| 65 2e 0d 2a 2f 0d 0d 64 | 69 6d 20 6c 44 61 74 65 |e..*/..d|im lDate|
|00000130| 20 61 73 20 44 61 74 65 | 54 69 6d 65 52 65 63 2f | as Date|TimeRec/|
|00000140| 2f 20 61 20 72 65 63 6f | 72 64 20 74 68 61 74 20 |/ a reco|rd that |
|00000150| 69 73 20 62 72 6f 6b 65 | 6e 20 69 6e 74 6f 20 79 |is broke|n into y|
|00000160| 65 61 72 2c 20 6d 6f 6e | 74 68 2c 20 64 61 79 2c |ear, mon|th, day,|
|00000170| 20 65 74 63 0d 64 69 6d | 20 73 65 63 20 61 73 20 | etc.dim| sec as |
|00000180| 6c 6f 6e 67 2f 2f 20 61 | 20 6c 6f 6e 67 20 69 6e |long// a| long in|
|00000190| 74 0d 0d 47 65 74 54 69 | 6d 65 28 6c 44 61 74 65 |t..GetTi|me(lDate|
|000001a0| 29 2f 2f 20 67 65 74 20 | 74 6f 64 61 79 0d 6c 44 |)// get |today.lD|
|000001b0| 61 74 65 2e 64 61 79 20 | 2b 3d 20 33 30 2f 2f 20 |ate.day |+= 30// |
|000001c0| 61 64 64 20 33 30 20 64 | 61 79 73 0d 44 61 74 65 |add 30 d|ays.Date|
|000001d0| 54 6f 53 65 63 6f 6e 64 | 73 28 6c 44 61 74 65 20 |ToSecond|s(lDate |
|000001e0| 2c 20 73 65 63 29 2f 2f | 20 63 68 61 6e 67 65 20 |, sec)//| change |
|000001f0| 69 74 20 69 6e 74 6f 20 | 73 65 63 6f 6e 64 73 0d |it into |seconds.|
|00000200| 53 65 63 6f 6e 64 73 54 | 6f 44 61 74 65 28 73 65 |SecondsT|oDate(se|
|00000210| 63 20 2c 20 6c 44 61 74 | 65 29 2f 2f 20 63 68 61 |c , lDat|e)// cha|
|00000220| 6e 67 65 20 69 74 20 62 | 61 63 6b 20 69 6e 74 6f |nge it b|ack into|
|00000230| 20 61 20 72 65 63 6f 72 | 64 0d 0d 77 69 6e 64 6f | a recor|d..windo|
|00000240| 77 20 31 2f 2f 20 64 69 | 73 70 6c 61 79 20 74 68 |w 1// di|splay th|
|00000250| 65 20 72 65 73 75 6c 74 | 73 0d 70 72 69 6e 74 20 |e result|s.print |
|00000260| 22 33 30 20 64 61 79 73 | 20 66 72 6f 6d 20 74 6f |"30 days| from to|
|00000270| 64 61 79 20 69 73 3a 22 | 0d 70 72 69 6e 74 20 6c |day is:"|.print l|
|00000280| 44 61 74 65 2e 6d 6f 6e | 74 68 22 2f 22 3b 0d 70 |Date.mon|th"/";.p|
|00000290| 72 69 6e 74 20 6c 44 61 | 74 65 2e 64 61 79 22 2f |rint lDa|te.day"/|
|000002a0| 22 3b 0d 70 72 69 6e 74 | 20 6c 44 61 74 65 2e 79 |";.print| lDate.y|
|000002b0| 65 61 72 0d 0d 0d 44 4f | 0d 48 41 4e 44 4c 45 45 |ear...DO|.HANDLEE|
|000002c0| 56 45 4e 54 53 0d 55 4e | 54 49 4c 20 30 0d 0d 00 |VENTS.UN|TIL 0...|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 01 00 00 00 01 12 | 00 00 00 12 00 00 00 61 |........|.......a|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000400| 00 00 00 02 01 18 00 00 | 00 08 00 67 00 d9 03 59 |........|...g...Y|
|00000410| 03 19 00 00 01 00 00 00 | 01 12 00 00 00 12 00 00 |........|........|
|00000420| 00 61 08 bb 51 08 02 3a | 00 00 00 1c 00 46 00 01 |.a..Q..:|.....F..|
|00000430| 52 45 4d 3e 00 00 00 12 | 77 50 4f 53 00 00 00 1e |REM>....|wPOS....|
|00000440| 03 e8 00 00 00 00 00 00 | 08 bb 50 7c 03 e8 00 0b |........|..P|....|
|00000450| 00 00 00 06 08 bb 4f 78 | 0a 52 45 4d 20 49 6e 64 |......Ox|.REM Ind|
|00000460| 65 6e 74 0f 57 69 6e 64 | 6f 77 20 50 6f 73 69 74 |ent.Wind|ow Posit|
|00000470| 69 6f 6e 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ion.....|........|
+--------+-------------------------+-------------------------+--------+--------+